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Field Name 



Id Type 



Formula / Entry Opttoi 



Address 1 
Address2 
Address3 
Address4 
AddressBlock 



Text 
Text 
Text 
Text 

Calculation (T ext) 



AddressBlock for Large Label Calculation (Text) 



AddressBlockEur 



Calculation (Text) 



AddressBlockEurLabels Calculation (Text) 



BCardOl 



Calculation (Text) 



Indexed 
Indexed 
Indexed 

= lf(Title2 * Empty, X Empty) & lf(Legal Entity * Empty, 
AddressBlockEur, 

lf(Sector Name * Empty, Sector Name Calc & X Empty) & 
"(iflgllii^&Mfe* Empty, §^jfl|iBMMft s ' X Empty) & 
lf(Group Name * Empty, Group Name & XEmpty) & lf(Address1 * 
Empty, Address! & T.Empty) & lf(Address2 * Empty, Address2 & 
XEmpty) & lf(Address3 * Empty, Address3 & XEmpty) & lf(City * 
Empty, City &","&" -.Empty) & lf(State * Empty, 
StateforAddressBlock & " ".Empty) & lf(Zp Code * Empty, Zip Code & 
T .Empty & T) & lf(DirectDial * Empty, "phone" & " " & DirectDial & 
XEmpty) &lf(Fax* Empty, "fax" &" "& Fax & XEmpty) &lf(Mobile 
. * Empty, "cellular" & • ■ a Mobile & T.Empty) & lf(Pager * Empty, 
"pager" & " " & Pager & XEmpty) & lf(Email * Empty, Email," " & T)) 
= Company Name & 1" & Name &T& "(Legal Entity * Empty, 
AddressBlockEurLabels, lf(Address1 * Empty, Address! & "T.Empty) 
& lf(Address2 * Empty, Address2 & XEmpty) & lf(Address3 * Empty, 
Address3 & XEmpty) & lf(City * Empty, City &","&" ".Empty) & 
lf(State * Empty, State & " ",Empty) & lf(Zip Code * Empty, Zip 
Code,Empty)) 

= lf(Legal Entity * Empty, Legal Entity & X Empty) & 
lf(Sector Name * Empty, Sector Name Calc & X Empty) & 

"(fiHtffi^MtiriMfc^P^^MMMHH** T, Empty) & 
lf(Group Name * Empty, Group Name & "T.Empty) & lf(Address1 * 
Empty, Addressl & "T.Empty) & lf(Address2 * Empty, Address2 & 
T.Empty) & lf(Address3 * Empty, Address3 & "T.Empty) & 
lf(Address4 * Empty, Address4 & "T.Empty) & lf(Zip Code » Empty, 
Zip Code &","&" ".Empty) & lf(City * Empty, City & V & " ".Empty) & 
lf(Country * Empty, Country & "T.Empty) & lf(DirectOial * Empty, "tel" 
& " " & DirectDial & T.Empty) & lf(Fax * Empty, "fax" & " " & Fax & 
T.Empty) & lf(Mobile * Empty, "mobile" & " " & Mobile & "T.Empty) & 
lf(Pager * Empty, "pager" & ■ " & Pager & T.Empty) & IffEmail * 
Empty, Email," "&"T) 

= lf(Legal Entity * Empty, Legal Entity & X Empty) & 
lf(Address1 * Empty, Address! & T.Empty) & lf(Address2 * Empty, 
Address2 & "T.Empty) & lf(Address3 * Empty, Address3 & T.Empty) 
& lf(Zip Code * Empty, Zip Code &","&" ".Empty) & lf(City * Empty, 
City &","&" ".Empty) & lf(Country * Empty, Country & T.Empty) 
= "open " & Quote & (^■■■■■i^BHMHl^Mgp' & 
Quote & T & 

"measureunits 3, 3, 10"&"T & 
■select 16p5, !lp!0"&T& 
"textedit"&"T & 
"selectall" &"T & 

lf(Name * Empty,"textenter ° & Quote & NameTitle & Quote 
&T."textenter " & Quote & " " & Quote &T) & 
"textcursor -textblock" &T & 
"textselect +eol" &T & 

"font " & Quote & "CorporateSBQ-Medium" & Quote & T & 
•select 17p7, !6p7"&T& 
"textedit"&"T & 
"selectair&T & 

"textenter " & Quote & Trim(AddressBlock) & Quote &T & 
"textcursor -textblock" &T & 
"textselect +eol 2" &T & 

"font " & Quote & "CorporateSExpBQ-Medium" & Quote & T & 
"select 16p5, 11 pi 0"&T& 



Figure 7 - continued 
Field Name Field Type 



Formula / Entry Option 



Calculation (Text) 



1extedit"&T & 
■selectair &T & 
"textcursor -textblock" &T & 
"textselect +eol M &T & 

"Color " & Quote & "PANTONE 471 CV" & Quote & T & 
"select 17p7, 16p7"&T& 
"textedit"&T & 
"selectair&T & 
"textcursor -textblock" &T & 
"textselect +eol 2" &T & 

"Color " & Quote & "PANTONE 471 CV" & Quote & T & 
"select 16p5, 11p10"&T& 
"textedif&l" & 
"textcursor +line" & "T & 
"textselect +textblock" &T & 
"Sizebump downone " & "T & 
"select 16p5, 11p10"&T& 
"textedit"&T & 
"selectall" &T & 
"KemText 0.025"&T& 
"select 17p7, 16p7"&T& 
M textedit tt & w T & 
"selectall"&T & 
"KemText 0.025" &T& 
"select 17p7, 16p7"&T& 
"textedit"&T & 

"textcursor +textblock u & 1" & 
"textselect -eol" & T & 

"font u & Quote & "CorporateSBQ-Regular" & Quote & T & 
"select 68p6, 1p11"&T& 
"textedit"&T & 
"selectair&T & 

"textenter " & Quote & (PlateRefNum) & Quote &T 
= lf(ltem Ordered = "Business Cards" 
"open " & Quote & 
Quote & "H" & 
"measureunits 3, 3, 10"&'T & 
"select 16p5, 11p7"&T& 
"textedit"&T & 
"selectair &T & 

lf(Name * Empty, "textenter " & Quote & NameTitle & Quote 
&T/textenter " & Quote & " " & Quote &T) & 
"textcursor -textblock" &T & 
"textselect +eol" &T & 

"font M & Quote & "CorporateSBQ-Medium" & Quote & 1" & 
"select 17p5, 16p3"&T& 
"textedit"&T & 
"selectall"&l" & 

"textenter " & Quote & Trim(AddressBlock) & Quote &T 
.Empty) & 

"textcursor -textblock" &T & 
"textselect +eol 2" &T & 

"font " & Quote & "CorporateSExpBQ-Medium" & Quote & T & 

"select 16p5, 11p7"&T & 

"textedif&T & 

"textcursor +line"&'T& 

"textselect +textblock" &T & 

"Sizebump downone " & *T & 

"select 17p5, 16p3"&T & 

"textedit"&T & 

"selectair &T & 

"KemText 0.025" & T & 



Figure 7 - 
Field Name 



continued 



Id Type 



Formula / Entry Optl 



# 



■select 16p5, 11p7"AT A 
"textedTAT A 
"selectalTAT A 
"KemTextO.025" AT A 
•select 17p5, 16p3"AT A 
fextedit'AT & 
"textcursor +textblock" A 1" & 
"textselect -eol" A 1" & 

font " & Qyqjp & "CorRprateSBQ-Regular* A Quote & T A 
•select 71 p3, 2p3"AT A 
•textedrT&T A 
•selectall"&T A 

"textenter " & Quote & (PlateRefNum) & Quote AT 



"measureunits 3, 3, 10" AT & 
•select 16p3, 11p3"AT A 
"textedifAT A 
"selectail" AT & 

lf(Name * Empty.fextenter " & Quote & NameTitle A Quote 
AT.f extenter M & Quote A " " A Quote &T) & 
"textcursor -textblock" AT & 
•textselect +eol" AT & 

font • & Quote & "CorporateSBQ-Medium" A Quote & T & 
•select 17p2, 16p7"AT A 
■textedit"&T A 
"selectalTAT & 

f e*tenter ■ A Quote & Trim(AddressBlock) & Quote AT & 
"textcursor -textblock" AT & 
"textselect +eol 2" AT & 

font * A Quote & "CorporateSExpBQ-Medium'' & Quote & T A 

•select 16p3, 11p3"AT A 

'textedSTAT & 

"selectail" AT A 

■textcursor -textblbck" AT A 

fextsetect +eol" AT A 

"Color ' A Quote A "PANTONE 471 CV" A Quote A T A 

■select 17p2 t 16p7"AT A 

"texte(fit"AT A 

"selectali"AT A 

■textcursor -textblock" AT A 

■textselect +eol 2" AT A 

•Color " A Quote A "PANTONE 471 CV" A Quote ATA 

•select 16p3 t 11p3'AT.A* - - 

"textedit"AT A 

•textcursor -Mine" A T A 

f extselect +textblock" AT A 

"Sizebump downone " A T A 

"select 16p3, 11p3"ATA 

fextedifAT A 

"selectail" AT A 

"KemText 0.025" ATA 

"select 17p2 t 16p7"AT A 

"textectif A"H" A 

"selectaiTAT A 

■KemText 0.025" AT A 

•select 17p2, 16p7"AT A 

f extedT AT A 

"textcursor +textblock" A T A 

"textselect -eol" A T A 

"font " A Quote A "CorporateSBQ-Regular" A Quote A T & 
"select 71 p, 2p5"AT A 




Calculation (Text) 



s "open " A Quote A 



A Quote A T & 



Figure 7 - continuec 
Field Name ~FIeld Type 



# 



Formula / Entry Option 



Calculation (Text) 



BCard02 



Calculation (Text) 



textedir&T & 
■selectair&T & 

'textenter * & Quote & (PlateRef Num) & Quote &T 
= lf(ltem Ordered = "Business Cards 0 , 
"open " & Quote & "HMpMP 
UhtfiB^MflHiM^mMmt 0 & Quote & T & 
"measureunits 3, 3, 10"&T & 
■select 16p6, 10pr&T & 
textedir&T'& 
"selectall" &T & 

lf(Name * Empty, textenter 0 & Quote & NameTitle & Quote 
&T.textenter " & Quote & " * & Quote &T) & 
"textcursor -textblock" &T & 
"textselect +eol" &T & 

font " & Quote & "CorporateSBQ-Medium ,t & Quote & T & 
"select 17p6, 15p7*&T& 
textedir&T & 
"selectall"&T & 

"textenter u & Quote & Trim(AddressBlock) & Quote &T 
.Empty) & 

textcursor -textblock" &T & 
"textselect +eol 2" &T & 

"font " & Quote & "CorporateSExpBQ-Medium ,, & Quote & T & 

"select 16p6, 10p7"&T& 

textedir&T & 

"textcursor -Mine" & T & 

"textselect +textblock" &T & 

"Sizebump downone "&T& 

"select 16p6, 10p7"&T& 

textedir&T & 

■selectall" &T & 

■KemText 0.025" &T& 

■select 17p6, 15p7"&T& 

textedrt"&T & 

■selectair&T & 

"KemText 0.025" &T& 

■select 17p6 ( 15p7"&T& 

textedir&T & 

textcursor +textb!ock" & T & 

textselect -eol° & T & 

font " & Quote & "CorporateSBQ-Regular u & Quote & 1° & 
■select 72p2 t 1p8"&T& 
Textedir&T & 
"selectall"&T & 

textenter ■ & Quote & (PlateRef Num) & Quote &T 
= "measureunits 3 t 3, 10"&T & 
■select 1 6p1 0, 32p1 1 "&T & 
textedir&T & 
"selectall" &T & 

lf(Name * Empty, textenter " & Quote & NameTitle & Quote 
&Ti textenter * & Quote & " " & Quote &T) & 
textcursor -textblock" &T & 
textselect +eol" &T & 

font " & Quote & "CorporateSBQ-Medium" & Quote & T & 
"select 17p6, 37p10"&T & 
textedit"&"1T & 
"selectair&T & 

textenter ■ & Quote & Trim(AddressBlock) & Quote &T & 
textcursor -textblock" &T & 
textselect +eol 2" &T & 

font " & Quote & "CorporateSExpBQ-Medium" & Quote & T & 
•select 16p10 ? 32p11"&T& 



Figure 7 - continued, 
Field Name ^fld Type 



Formula / Entry Optloi 



Calculation (Text) 



textedir&T & 
'selectair &T& 
textcursor -textblock 0 &T & 
textselect +eol" &T & 

"Color' & Quote & "PANTONE 471 CV" & Quote & T & 

•select 17p6, 37p10"&T & 

textedir&T & 

■selectair&T & 

textcursor -textblock" &T & 

"textselect +eol 2" &T & 

"Color ' & Quote & "PANTONE 471 CV" & Quote & T & 

"select 16p10, 32p1 1"&T & 

"textedit"&T & 

"textcursor -Mine 0 &T& 

•textselect +textblock" &T & 

"Sizebump downone " & T & 

•select 17p6 f 37p10"&T & 

"textedif&T& 

•selectair &T & 

"KemText 0.025" &T& 

■select 16p10, 32p1 1"&T & 

textedit'&T & 

"selectall"&T & 

•KemText 0.025" & T & 

"select 17p6, 37p10"&T& 

textedit'&T & 

•textcursor +textblock 0 & T & 
■textselect -eol"&T& 

font " & Quote & "CorporateSBQ-Regular u & Quote & 1" 
s "measureunits 3, 3, 10"&T & 
■select 16p7, 32p7"&T & 
textedit'&T & 
"selectair &T& 

lf(Name * Empty, textenter " & Quote & NameTitle & Quote 
&T»"textenter 0 & Quote & " " & Quote &T) & 
■textcursor -textblock" &T & 
textselect +eol" &T& 

tont " & Quote & "CorporateSBQ-Medium" & Quote & 1" & 
•select 16p9, 37p1"&T& 
textedir&T & 
"selectalT&T & 

textenter " & Quote & Trim(AddressBlock) & Quote &T & 
textcursor -textblock" &T & 
"textselect +eol 2" &T & 

font " & Quote & "CorporateSExpSQ-Medium" & Quote & T & 

•select 16p7 t 32p7"&T& 

textediT&T & 

textcursor -Mine' & T & 

textselect +textblock B &T & 

■Sizebump downone " & T & 

"select 16p9 t 37p1"&T& 

textedrt"&T & 

•selectair &T& 

"KemText0.025 B &T& 

•select 16p7, 32p7"&T & 

textedif&T & 

•selectall"&T & 

"KemText0.025 B &T& 

"select 16p9, 37pr&T & 

textedit"&T & 

"textcursor +textblock" & T & 
textselect -eol w & T & 



Figure 7 - continued 
Field Name 



d Type 



Formula / Entry Option 



Calculation (Text) 



City 

Company Name 



Text 

Calculation (Text) 



' textselect +eol 2" &T& 
•Color " & Quote & "PANTONE 471 CV" & Quote & T & 
•select 64p11 f 95p1"&T& 
textediT&T & 
textcursor -Mine" & T & 
textselect +textblock' &T & 
"Sizebump downone " & T & 
■select 65p2, 99p4 - &T & 
textediT&T & 
•selectall" &T& 
•KemText 0.025" &T& 
•select64p11,95p1"&T& 
textediT&T & 
•selectair&T & 
"KemText0.025"&T& 
•select 65p2, 99p4'&T & 
textediT&T & 
textcursor +textblock" & "IT & 
textselect -eol" & T & 

font ' & Quote & "CorporateSBQ-ReguIar" & Quote & 1" 
a "measureunits 3, 3, 10"&T & 
■select 64p9, 94p8"&T& 
textediT&T & 
•selectall" &T& 

lf(Name * Empty, "textenter " & Quote & NameTitle & Quote 
&T."textenter " & Quote & " " & Quote &T) & 
"textcursor -textblock" &T & 
"textselect +eol" &T & 

"font " & Quote & "CorporateSBQ-Medium" & Quote & T & 
■select 65p6, 99p7"&T& 
textediT&T & 
"selectair&T & 

textenter " & Quote & Trim(AddressBlock) & Quote &T & 
textcursor -textblock" &T & 
textselect +eol 2" &T& 

font " & Quote & "CorporateSExpBQ-Medium" & Quote & T & 

■select 64p9, 94p8"&T& 

textediT&T & 

textcursor +line" &T& 

textselect +textblock" &T & 

"Sizebump downone " & T & 

•select 65p6, 99pr&T& 

textediT&T & 

"selectall" &T & 

■KemText0.025"&T& 

■select 64p9, 94p8"&T& 

textediT&T & 

"selectalT&T & 

■KemText0.025"&T& 

"select 65p6, 99p7"&T& 

textedit'&T & 

textcursor +textblock" & T & 

textselect -eol" & T & 

font " & Quote & "CorporateSBQ-Regular" & Quote & 1" 

Indexed 

Indexed 

= lf(Sector Name = ' 



Sector Name,lf(Sector Name = 
Sector Name,lf(Sector Name = ' 



Figure 7 - 
Field Name 



continued 




Held Type 



Formula / Entry Option 



Country 
Date Created 



Date Modified 

DirectOial 

DupYesNo 

Email 

emaitcalc 

Emaillnstructions 

Empty 



Text 
Date 

Date 

Text 
Text 
Text 

Calculation (Text) 

Texf 

Text 



Indexed 

Auto-enter the: "Creation Date" 

Prevent data that is automatically entered from being changed. 
Indexed 

Auto-enter the: "Modification Date" 

Prevent data that is automatically entered from being changed. 



Indexed 

a lf(Length(Email) > 32, "too many characters", Empty) 



FAEC Comments 
Fax 

Group Name 
IntemationalCode 
IPAddress 
Item Ordered 

JobTicket 

Legal Entity 

LocalCode 

Mobile 

Name 

NameTitle 

NewPlateNum 
Pager 

PlateRefNum 
Quantity Ordered 

Quote 

Record Modified 
Record Number 



Text 
Text 
Text 
Text 
Text 
Text 

Text 
Text 
Text 
Text 
Text 

Calculation (Text) 

Number 
Text 
Text 
Number 

Calculation (Text) 

Text 

Number 



Indexed 



Indexed 



Auto-enter "Business Cards" 
Repeating field with 3 repetitions 

Indexed 

Indexed 

Indexed 

sName&T& 

TrtIe&T& 

Trtle2&T 

Auto-enter "26" 
Indexed 

Auto-enter "250" 
Indexed 



Auto-enter calculation = lf(lsEmpty(FAEC Comments), V) 
Serial Number with Current VaJue***MMM& Increment: "1" 
Prevent data that is automatically entered from being changed. 
Indexed 



Sector Name 
Sector Name Calc 

SenttoFilm 



Text 

Calculation (Text) 
Text 



Indexed 

a lf(Secto r Name = ' 

W(Legal Entity * Empty and Sector Name =1 
Sector Name)) 

Auto-enter "No" 
Value List (Custom Values): 
Yes 
No 

Indexed 



►Empty, 



Figure 7 - continue 
Field Name 




Held Type 



Formula / Entry Option 



SenttoFilmDate 

ShipAddress 

ShipAddressCalc 

ShipCity 
ShipCityCalc 

ShipCountry 
ShipCountryCalc 

ShipName 
ShipNameCalc 

ShipSameAsOrder 

ShipState 

ShipStateCalc 

ShipZip 
ShipZipCalc 

SpareOatel 

SpareDate2 

SpareGlobalContain 

SpareGlobalDate 

SpareGIobaJNum 

SpareGlobalText 

SpareGIobaTTime 

SpareNum2 

SpareTextl 

SpareText2 

SpareTimel 

SpareTime2 

Special Instructions 

State 

StateCalc 



Oate 
Text 

Calculation (Text) 
Text 

Calculation (Text) 
Text 

Calculation (Text) 
Text 

Calculation (Text) 

Text 
Text 

Calculation (Text) 
Text 

Calculation (Text) 

Date *» 
Date 

Global (Container) 

GlobaUDate) 

Global (Humber) 

Global (Text) 

Global (Time) 

Number 

Text 

Text 

Time 

Time 

Text 

Text 

Calculation (Text) 



Indexed 
Indexed 
Indexed 

a lf(ShipSameAsOrder = "Yes", Addressl & " " & Address2 & " " & 

Address3,ShipAddress) 

Indexed 

Indexed 

= lf(ShipSameAsOrder = "Yes",City,ShipCity) 
Indexed 

a lf(ShipSameAsOrder = "Yes",Country,ShipCountry) 

Indexed 

Indexed 

= lf(ShipSameAsOrder = B Yes u t Name t ShipName) 

Indexed 

Indexed 

Indexed 

a lf(ShipSameAsOrder = "Yes",State,ShipState) 
Indexed 

a lf(ShipSameAsOrder = "Yes",Zip Code.ShipZip) 



Indexed 
Indexed 

a lf(State = "AL", "Alabama", lf(State = "AK", "Alaska", lf(State = "AZ", 
"Arizona", !f(State = "AR", "Arkansas", lf(State = "CA", "California", 
lf(State a "CO", "Colorado", If(State = "CT", "Connecticut", lf(State = 
"DE", "Delaware", lf(State a "FL", "Rorida", lf(State a °GA", "Georgia", 
lf(State = "HI", "Hawaii", lf(State = "ID", "Idaho", lf(State = "IL", "Illinois", 
lf(State a "IN", "Indiana", lf(State = "IA", "Iowa", lf(State a "KS", 
"Kansas", lf(State = "KY", "Kentucky", If(State = "LA", "Louisiana", 
lf(State = "ME", "Maine", lf(State = "MD", "Maryland", lf(State = "MA", 
"Massachusetts", lf(State a "Ml", "Michigan", If(State a "MN", 
"Minnesota", lf(State = "MS", "Mississippi", lf(State = "MO", "Missouri", 
lf(State = "MT, "Montana", lf(State = "NE", "Nebraska", !f(State = "NV, 
"Nevada", lf(State = "NH", "New Hampshire", lf(State = "NJ", "New 
Jersey", lf(State = "NM", "New Mexico", lf(State = "NY", "New York", 
lf(State a "NC", "North Carolina", lf(State = "ND", "North Dakota", 
lf(State = "OH", "Ohio", lf(State = "OK", "Oklahoma", lf(State a "OR", 
"Oregon", If(State = "PA", "Pennsylvania", lf(State a 'Rl", -Rhode 
Island", lf(State a "SC", "South Carolina", If(State a "SD", "South 
Dakota", lf(State = "TN", "Tennessee", lf(State = "TX", "Texas", lf(State 
a "UT\ "Utah", lf(State = "VT\ "Vermont", lf(State = "VA", "Virginia", 
lf(State = DC, ^Washington DC", lf(State = "WA", "Washington", 



Figure 7 - continued 
Field Name 



eld Type 



# 



Formula / Entry Option 



StateforAddressBlock 
Tagline Translation 
Tagline Translation Language Text 



Calculation (Text) 
Text 



Time Created 

Title 
71tle2 

Titlelnstructions 
Translation Faxnumber 
Translation Language 
Translation needed? 

Userlnputlnitials 
UserModifiedlnitials 
View Record Number 
Void 



U 5 



Webaddress 
Zip Code 



Time 

Text 
Text 
Tejrt 
Text 
Text 
Text 

Text 
Text 
Number 
Text 



Text c 
Text 



' lf(State = "WV", "West Virginia", lf(State = "Wl", "Wisconsin 0 , lf(State 
•WY-, "Wyoming", Empty))))m 
s lf(StateCalc * Empty, StateCalc, State) 
Auto-enten "Include Tag line in English" 

Auto-enter the: "Creation Time" 

Prevent data that is automatically entered from being changed. 
Indexed 



Indexed 

Auto-enten "English only" 
Indexed 



Indexed 

Value List (Custom Values): 

OK 

Void 

Manual Type 
Follow up 
ReRun 

Translation Done 
Indexed 



Indexed 



Figure 8 

<IDOCTYPE HTML PUBCTC "-//IETF//DTD HTMLy/EN"> 
<html> 

<head> 

<meta http-equiv="Content-Type" 
content="text/html; charset=iso-8859-1 "> 
<meta name="GENERATOR" content="Microsoft FrontPage 2.0"> 
<tit'e>^HBHHBHHWnp/title> 

</head> 

<body background="images/background.gif" bgcolor="#FFFFFF"> 

<h1 align="center"4IHBHHBPP^ h1> 

<pxbr> 
</p> 

□ <h2 align="center">AII fields with gold arrows (<img 
I src=:"images/arrow_gold.gif B **align="top ,, width="10" height="16">) 
l=y are required.<br> 
=0 Other items are optional.</h2> 

m 

: fi * 

i=n <CENTER> 

<TABLE BORDER=0 CELI_PADDING=1 5><TRxTH BGCOLOR="#CCCCCC"> 

<FONT COLOR="#FF0000"> 
% Type in upper and lower case.<BR>DO NOT TYPE IN ALL CAPS. 
i| </FONT> 

J </TH></TR></TABLE> 
-° </CENTER> 

<hr size=1> 

<form action="FMPro" method="POST"> 
<input type="hidden" name="-db" value='l 
<input type="hidden" name="-format" value=" _____ 
<input type="hidden" name="-error" value="gb_err.htm"> 
<input type="hidden" name="-lay" value="Order Form"> 

<!-- TABLE ORDER START-> 

<TABLE BORDER=0 CELLPADDING=3 CELLBORDER=0 CELLSPACINGS > 
<TR> 




- 1 - 



IGN=RIGHTx/TD> 



Figure 8 - continued 

<TD VALIGN=TOP ALI<Ift=RIGHT></TD> 
<TD VALIGN=TOP C0LSPAN=2> 
<b>Ordering lnfo:</b> 
</TD> 

</TR><JR> 

<TD VALIGN=TOP ALIGN=RIGHTximg src="images/arrow_gold.gif" align="top" 
width="7" height="11"x/JD> 

<TD VALIGN=TOP>ltem'Ordered:</TD> 

<TD VALIGN=TOPxinput type="checkbox" checked name="ltem Ordered" 
value="Business Cards">Business Cards</TD> 

</TRxTR> 

<TD VALIGN=TOP ALIGNsRIGHTximg src="images/arrow_gold.gif" align="top" 
width="7" height="11"x/TD> 

<TD VALIGN=TOP>Quantity Ordered:</TD> 
<TD VALIGN=TOP> 
<input type="radio" checked name="Quantity Ordered" value="250">250 @ 
+ taxes and shipping.<BR> 
g <input type="radio n name.="Quantity Ordered" value="500">500 taxes 
n and shipping.<BR> 

<input type="radio" name="Quantity Ordered" value="1000">1000 @ 
% taxes and shipping.<BR> 

ifi <input type="radio" name="Quantity Ordered" value="Other">Other (Please order in 
;5 units of 500)<BR> 

y If Other, please specify: 

<input type="text" size=10 name="Quantity Ordered"> 

<BR> . 

(Additional charges will apply for special instructions andp|lraQslation).<BR> 
<PRExBRx/PRE> 

</TD> 

</TRxTR> 

<TD ALIGN=RIGHTximg src^'images/arrow.gold.gif" align="top" width="7" 
height="11"x/TD> 
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Figure 8 - continued 

<TD>Name(Rrst Middle - Last):</TD> 
<TDxinput type="text" size="30 n maxlength= n 30" name="Name n x/TD> 

</TR><TR> 



<TDx/TD> 

<TD>Title Line1:</TD> 

<TDxinput type= n text" size="30" maxlength="30" name="Title"> (see * below)</TD> 
</TRxTR> 



<TDx/TD> 

<TD>Title Line2:</TD> 

<TDxinput type="text" size="30" maxlength="30" name="Title2"x/TD> 
</TRxTR> 



□ <TDx/TD> 

| <TD COLSPAN=2> 

lit <blockquote> 




</TRxTR> 



<TDximg src="images/arrow_gold.gif" align=:"top" width="7" height="11"x/TD> 
<TD>Organizational Name:</TD> 

<TDxinput type="text" size="40" name= n Sector Name" value='l 
z/TD> 



</TRxTR> 



<TDx/TD> 

<TD>Group Name:</TD> 
<TDxinput type="text u size="40" name="Group Name" value=""</TD> 



-3- 



Figure 8 - continued 

</TRxTR> 



<TDximg src="images/arrow_gold.gif" align="top" width="7" height="11"x/TD> 
<TD>Address Line1:</TD> 

<TDxinput type="text" size="30" maxlength="30" name="Address1"x/TD> 
</TRxTR> 
<TDx/TD> 

<TD>Address Line2:</TD> 

<TDxinput type="text" size="30" maxlength="30" name="Address2"x/TD> 
</TRxTR> 
<TDx/TD> 

<TD>Address Line3:</TD> 

<TDxihput type="text" size="30" maxlength="30" name="Address3"x/TD> 
</TRxTR> 

<TDximg src="images^rrow_gold.gif" align="top" width="7" height="1 1"x/TD> 
<TD>City:</TD> 

<TDxinput type="text" size="30" name="City"x/TD> 
</TRxTR> 

<TDximg src="images/arrow_gold.gif" align="top" width="7" height="1 1 M x/TD> 
<TD>State:</TD> 

<TDxinput type="text" size="25" name= ,, State"x/TD> 
<fi*RxTR> 

<TDximg src="images/arrow_gold.gif align="top" width="7" height*'"! 1"x/TD> 
<TD>Zip Code:</TD> 
<TDxinput type="text" size="11" name="Zip Code"x/TD> 

</TRxTR> 



<TDximg src="images/arrow_gold.gif M align="top" width="7" height="1 1"></TD> 
<TD>Phone:</TD> 
<TDxinput type="text" size="24" name="DirectDial"x/TD> 



Figure 8 - continued 

<fl"RxTR> 

<TD></TD> 
<TD>Fax:</TD> 
<TDxinput type="text" size="24" name="Fax"x/TD> 

</TR><TR> 

<TDx/TD> 
<TD>Mobile:</TD> 
<TDxinput type="text" size="24" name="Mobile"x/TD> 

</TRxTR> 

<TDx/TD> 
<TD>Pager:</TD> 
<TDxinput type="text" size="24 M name="Pager"x/TD> 

</TRxTR> 

<TDx/TD> 

<TD>Email Address:</TD> 

<TDxinput type="text" size="50" name= n Email n xBR>(see 



</TRxTR> 



Figure 8 - continued 

</TRxTR> 



<TD C0LSPAN=3> 
<hrsize=1> 
</TD> 

</TRxTR> 

<TD></TD> 

<TD COLSPAN=2xb>Translation and back of card lnfo:</bx/TD> 
</TRxTR> 
<TDx/TD> 

<TD COLSPAN=2>Front of Card Language</TD> 

</TRxTR> 

<TDx/TD> 

<TD C0LSPAN=2> 

<input type="radio" namg="TranslationFrontDummy" value="english" checked> 
Produce as typed. <BR> 

<input type="radio" name="TranslationFrontDummy" value="other"> Translation 
needed rn 

<input type="text" size="20" name=Translation Language"> language.<BR> 
<IMG SRC="./images/blank.gif WIDTH=18 HEIGHT=2 BORDER=0> 

(Note: Translation only will be faxed to you for approval.) 
<PRExBRx/PRE> 
</TD> 

</TRxTR> 

<TDx/TD> 

<TD COLSPAN=2>Back of Card Language (Optional)<ATD> 

</TRxTR> 

<TDx/TD> 

<TD COLSPAN=2> 

<input type="radio" name="TranslationBackDummy" value="english u checked> 
Produce as typed.<BR> 




Figure 8 - continued 

<input type="radi9 ,,, Tame="TranslationBackDummy" value="other"> Translation 
needed in 

<input type="text" size="20" name="Translation Back Language's language.<BR> 
<IMG SRC="./images/blank.gif" WIDTH=18 HEIGHT=2 BORDER=0> 

(Note: Translation only will be faxed to you for approval.) 
<PRE><BRx/PRE> 
</TD> 

</TRxTR> 

•w 

V 

<TD></TD> 

<TD C0LSPAN=2>Back of Card Information (Optional)</TD> 
</TRxTR> 
<TD></TD> 

<TD C0LSPAN=2xTEXTAREA NAME="Back of Card Info" ROWS=10, 
□ COLS=50x/TEXTAREA> 
' l 2 </TD> *• 



i fcr 



</TRxTR> 

<TD C0LSPAN=3xhr size=1x/TD> 

</TRxTR> 

<TDx/TD> 

<TD C0LSPAN=2>Special lnstructions:</TD> 
</TRxTR> 
<TDx/TD> 

<TD C0LSPAN=2xinput type="text" size="70" name="Special lnstructions"x/TD: 
</TRxTR> 

<TD C0LSPAN=3xhr size=1x/TD> 

</TRxTR> 

<TDx/TD> 

<TD C0LSPAN=2xb>Shipping lnfo:</bx/TD> 
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</TRxTR> 
<TD><n"D> 

<TD C0LSPAN=2xb>ls shipping info same as order info?:</bx/TD> 
</TRxTR> 
<TDx/TD> 

v 

<TD COLSPAN=2xinput type="radio" checked name= n ShipSameAsOrder" value="Yes"> 
Yes 

<input type="radio" name= D ShipSameAsOrder" value="No"> No <BR> 
<b><BR>"lf no, Please fill out information below."</bx/TD> 

</TRxTR> 

<TDximg src="images/arrow_gold.gif" align="top n width="7" height="1 1"></TD> 
<TD>Ship To Name:</TD> 
<TDxinput type="text" size="50" name="ShipName"x/TD> 

</TRxTR> 

<TDximg src="images/arrow_gold.gif" align="top" width= n 7" height="1 1"x/TD> 
<TD>Ship Address:</TD> 

<TDxinput type="text" size="60" name="ShipAddress"x/TD> 
</TRxTR> 

<TDximg src="images/arrow_gold.gif" align="top" width="7" heights" 1 1"></TD> 
<TD>Ship City:</TD> 

<TDxinput type="text" size="30" name="ShipCity"x/TD> 
</TRxTR> 

<TDximg src="images/arrow_gold.gif" align="top" width="7" height="1 1"></TD> 
<TD>Ship State:</TD> 

<TDxinput type="text" size="3" name="ShipState"x/TD> 
</TRxTR> 

<TDximg src="images/arrow_gold.gif" align="top" width="7" height="1 1"></TD> 
<TD>Ship Zip Code:</TD> 
<TDxinput type="text" size="11" name="ShipZip"x/TD> 
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</TRxTR> 

<TD C0LSPAN=3xhr size=1x/TD> 

</TRxTR> 

<TDx/TD> 



<TD C0LSPAN=2xb>Billing Info: A request for your billing information will be sent 
to you shortly.</bx/TD> 



</TRxTR> 

<TD COLSPAN=3xhr size=1 ></TD> 

</TRxTR> 

<TDx/TD> 

<TD COLSPAN=2> 

<input types-submit" name="-new" value="Verify Order">     

<input type="reset" value="Clear Form"> 

</TD> 

</TRx/TABLE> 

</form> 
</body> 
</html> 
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tell application "FileMaker Pro" 
activate 

open "Set the path name to the file you are opening" 
do script FileMaker script "Type name of script here" 
end tell 



tell application 'Tinder" 

if exists file "Set Path and File Name" then 
tell application "Finder" 
activate 

select file "File Name goes here" of folder "Set 
Folder Path" of startup disk 

open selection 
end tell 

tell application "FileMaker Pro" 
activate 

do script FileMaker script "Name of Import Script" 
of window "Set File maker Pro File Name" 
end tell 
end if 
end tell 



Figure 10 

Script Step / Options 



Script Parameters 



Copy 

Select entire contents 

Import Records 
Restore import order 
No dialog 



^Administration) 



(Text) 
(Text) 



SpareGlobalNum 

Filename: "|_ 
Import Order: 

Date Created (Date) 

Date Modified (Date) 

Record Number (Number) 

Name (Text) 

Ema3 (Text) 

BlS (Text) 

Addressl (Text) 

Stats (Text) 

Zip Code (Text) 

Country (Text) 

DirectDial (Text) 

Time Created (Time) 
(Text) 

Item Ordered (Text) 

Quantity Ordered (Number) 

Webactoress (Text) 
A tiri ress2 (Text) 
Trtle2 (Text) 
EM (Text) 
Pager (Text) 
Empty (Text) 
Translation needed? 
Translation Language 
Sector Name (Text) 
ShipName (Text) 
ShipAddress (Text) 
ShieCifc (Text) 
ShipState (Text) 
ShipZip (Text) 
ShioSameAsOrder (Text) 

IPAtfriress (Text) 

Legal Entity (Text) 

Mobile (Text) 

ShipCountry (Text) 

View Record Number (Number) 

TagKne Translation (Text) 

Taaiine Translation Language (Text) 
Titlelnstructions (Text) 
Emaillnstructions (Text) 
Special Instructions (Text) 
SpareNum2 (Number) 
SpareGlobalText (Text) 

SpareGlobalNum (Number) 
SpareGlobalPate (Date) 

SpareGlobalTime (Time) 
SpareDatel (Date) 
SpareDate2 (Date) 
SpareTimel (Time) 
SpareT?me2 (Time) 
Translation Faxnumber (Text) 
Atitiress3 (Text) 

(Text) 




=C Comments (Text) 
Record Modified (Text) 
SenttoFilm (Text) 
SenttoRlmDate (Date) 
Userinputlnitials (Text) 



Figure 10 - continue 
Script Step / Options 



Script Parameters 



Go to Record/Request/Page 

First 

Loop 
If 

Set Field 



Duplicate Record/Request 

Go to Record/Request/Page 

First 

Else 
If 



Set Field 

Duplicate Record/Request 

Duplicate Record/Request 

Duplicate Record/Request 

Go to Record/Request/Page 

First 

Else 

Go to Record/Request/Page 
Next 

Exit after last 
End If 
End If 
End Loop 

Paste 

Select entire contents 

If 

New Record/Request 
Set Field 



Set Field 



UserModifiedtnitialfi (Text) 
JobTicKet (Text) 
PlateRefNum ... (Text^ 
A4dress4 (text) 
IntemationalCode (Text) 
LocalCode (Text) 

SoareTextl (Text) 
SpareText2 (Text) 



Calculation 
Quantity Ordered = "500" 



Quantity Ordered 
Calculation 

"250" 



Calculation 
Quantity Ordered = "1000" 

Quantity Ordered 
Calculation 

"250" 



SpareGlobalNum 

Calculation 
Status(CurrentFoundCount) * 25 



Name 
Calculation 

"Dummy Record 0 

Address 1 
Calculation 

"Dummy Record" 
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Script Step / Options 



# 



, Script Parameters 



Go to Record/Request/Page 

First 

End If 
If 



Perform Script 
Sub-scripts 

Else 

If 

Perform Script 

Sub-scripts 

Else 
If 

Perform Script 
Sub-scripts 

Else 

If 

Perform Script 

Sub-scripts 

End If 

End If 

End If 

End If 

Find All 



Calculation 
Sector Name = 

CfcHP^fer Sector Name = 0 



Sector Name 

Ir Sector Name = 
' or Sector Name = Empty 



r Sector Name = ' 

or Sector Name = 
or Sector Name = "fflBMHfe 
ector Name = "MM^HMBB^BBHMr" or 

lor Sector Name = 



Calculation 
Sector Name 




Calculation 
Sector Name 




Calculation 
Sector Name = 
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* Go to Layout ["Quick Find"] 

* Enter Find Mode [] 

* Set Field ["SentToFilm 

* Set Field [" ItemOrdered " "Business Cards" "] 
1 Set Field ["RecordStatus ", ""OK""] 

* Set Field ["BillToNum " "01 57acsc" "] 
I Paste Literal [Select, " Great ionDate 

I Paste Current Date [* Great ionCfete"] 
I Perform Find [] 

it If rstatus(CurrentFoundCount) = 0 W ] 

I Perform Script [Sub-scripts, "FindforLithoTypeset Part 2 # ] 
1 Else 

* End If 

* Loop 

* If [ # Qty = 250 or Qty =100"] 



Figure 12 - continued 



* Else 

* If ["Oty = 500"] 

* Set Field [" SpareTextS " , " Oty " ] 

* Set Field ["Oty", "250"] 
I Dup I icate Record /Request 

| Set F ie Id [ " JobT icket ", " "Dummy " "J 

f Go to Record /Request /Page [First] 

I Else 

I If ["Oty = 1000"] 

» Set Field SpareTextS " , " Oty " ] 

I Set Field ["Oty", "250"] 

I Dup I icate Record /Request 

* Set Field JobT icket " , " "Dummy " " ] 

* Dup I icate Record /Request 

* Duplicate Record /Request 



Figure 12 - continued 



* Dup I icate Record /Request 

* Set Field JobT icket " f " "Dummy " " ] 

* Dup I icate Record /Request 

* Dup I icate Record /Request 

i Go to Record /Request /Page [First] 

I End If 

| End If 



* End If 

S3. 

i End Loop 

| If ["Status(CurrentFoundCount) = 6 or Status(CurrentFoundCount) = 

1 Pause /Resume Script [] 

I Go to Record /Request /Page [F ir st ] 

1 Perform Script [Sub-scripts, " Create Litho BCard Job Ticket "] 

* Else 

* Perform Script [Sub-scripts, "FindforLithoTypeset Part 2"] 

* End If 



Figure 13 

Script Step / Options 



Script Parameters 



Go to Record/Request/Page 

First 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 

Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



PlateRefNum 
Calculation 

lf(Sector Name =J 



SpareGlobalNum + 1 & 



^SpareGlobalNum + 1), 



SenttoFilmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker 6.5 
Event Class: misc 
Event ID: dose 
Held: BCardO! 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

lf (Sector Nam e = ^gfggmjp", SpareGlobalNum + 1 & 

"-WBttMT SpareGlobalNum + 1) 
SenttoRlmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event 10: dose 
Field BCard02 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

If (Sector Name=j 



Ft", SpareGlobalNum + 1) 
SenttoRlmDate 

Calculation * 

Today 

Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event ID: dose 
Reld: BCard03 
Wait for reply 

Bring application to foreground 



P, SpareGlobalNum + 1 & 



PlateRefNum 
Calculation 

lf(Sector Name =i 



, SpareGlobalNum + 1 & 



SpareGlobalNum + 1) 



Figure 13 - continued 
Script Step / Options . 



Script Parameters 



Set Field 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 

Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 

Next 

Set Field 



Set Field 



SenttoFilmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker 6.5 
Event Class: misc 
Event ID: dose 
Field: BCard04 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

if(SectorNar^ + 1 & 

'-MIBSpareGlobalNum + 1) 

SenttoFilmDate 
Calculation 

Today 
Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event ID: dose 
Field: BCardOS 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

lf(Sector Name = ^■^■■H^^pareGlobalNum + 1 & 
"^■■■PSpareGlobalNum + 1) 

SenttoFilmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event ID: dose 
Field: BCard06 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

lf(Sector Name = 1 



JpareGlobalNum + 1) 



BpareGloballMum + 1 & 



SenttoFilmDate 
Calculation 

Today 
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Figure 13 - continue 
Script Step / Options 



Script Parameters 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 

Next 

Set Field 



Set Field 



Send Apple Event 



Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event ID: dose 
Field: BCard07 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

lf(Sector Name = "fl^HHHf SpareGlobalNum + 1 & 
fSpareGlobaiNum + 1) 

SenttoFilmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event ID: dose 
Field: BCard08 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

lf( Sector Name = Ifl^^HHBKpareGlobalNum + 1 & 
"•^■■MM^pareGlobaJNum + 1) 

SenttoFilmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event ID: dose 
Field: BCard09 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

lf(SectorName = ■■■■BHNpareGlobalNum + 1 & 
n -lMMM? SpareGlobalNum + 1) 

SenttoFilmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker® 6.5 
Event Class: misc 
Event ID: dose 
Field: BCardIO 
Wait for reply 

Bring application to foreground 
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Script Step / Options 



Script Parameters 



Go to Record/Request/Page 
Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



Set Field 



Send Apple Event 



Go to Record/Request/Page 
Next 

Set Field 



PlateRefNum 
Calculation 

lf(Secto^Jame = t f^|HHH^ s P areG,obdlNum + 1 & 
"^^^HHVpareGlobalNum + 1) 

SenttoFilmDate 
Calculation 

Today 

Event Specification: 
Application: Adobe® PageMaker 6.5 
Event Class: misc 
Event ID: dose 
Field: BCard11 
Wait for reply 

Bring application to foreground 



PlateRefNum 
Calculation 

lf (Sector Name = "•■■■BB^SpareGlobalNum + 1 & 
"-(■^■tftSpareGlobalNum +1) 
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"measureunits 3^ 10"&T & A 

"select 2p5, IpPP'H" & ~ 

"textedit"&"U" & 
"selectall" &1" & 

lf(Name * Empty,"textenter " & Quote & NameTitle & Quote 
&T,"textenter " & Quote & " " & Quote &T) & 
"textcursor -textblock" &T & 
"textselect +eol" &1" & 

"font " & Quote & "Bl Garamond Boldltalic" & Quote & "T & 
"select 12p10, 4p6"&T & 
"textedit"&"H" & 
"selectair&'T &" 

"textenter " & Quote & Trim(AddressBCardLthd) & Quote &T & 
"select 2p9, 10p10"&T & 
"textedit M &'T & 
"selectall"&l" & 

"textenter " & Quote & lf(EDSTagLine = Empty, " ", EDSTagLine) & 
Quote &T & 

"printoptionsps normalimage, off, off, fast, on, off, off, 
off, off" &"U" & 
"print 1 (1,1)" & 

"close", 
Empty) 



Figure 14 



Figure 15 

* If [ " Status(Curr entFoundCount) = 6 " ] 

* Perform Scr ipt [Sub-scr ipts , " CountFor6 * ] 

* Else 

* If [ " Status(Curr en* FoundCount) = 7 * ] 

% Perform Script [Sub-scripts, " CountFor? "] 

€ Else 

| If [" Status(Cur rentFoundCount) = 8 ] 

$ Perform Scr ipt [Sub-scr ipts , " CountFor S * ] 

I Else 

% If [ w Status(CurrentFoundCount) =15"] 

f : Perform Scr ipt [Sub-scr ipts , " CountFor 14"] 

m Else 

| If [ " Status(CurrentFoundCount) i 1 6 " ] 

* Perform Script [Sub-scripts, " AutoTypeLithoC 

* End If 

* End If 



Figure 15 - continued 

* Go to Record /Request /Page [First] 

* Duplicate Record /Request 

* Set F ie Id [ " JobT icket " , " "Dummy " " ] 

* Go to Record /Request /Page [No dialog, By Number... 
i| Duplicate Record /Request 

I Set Field ["JobT icket", " "Dummy " "] 

| Go to Record /Request /Page [No dialog, By Number... 

I Duplicate Record /Request 

I Set Field [" JobT icket " , " "Dummy " " ] 

| Go to Record /Request /Page [No dialog, By Number... 

1 Duplicate Record /Request 

1 Set Field ["JobT icket", ""Dummy""] 

| Go to Record /Request /Page [No dialog, By Number... 

* Duplicate Record /Request 

* Set F ie Id [" JobT icket " , " "Dummy " " ] 

* Go to Record /Request /Page [No dialog, By Number... 



Figure 15 - continued 



* New Record /Request 

* Set Field [" JobTicket ", ff "Dummy"1 

* Set Field ["FirstName ", " "ZZDummy" "] 

* Set Field ["City", ""ZZDummy""] 

% Set Field [" Address 1 ", ""Dummy""] 
| Sort [Restore, No dialog] 

| Perform Script [Sub-scripts, " AutoTypeLithoCards "] 



Figure 16 



* Set Error Capture [On] 

* Go to Layout ["Data Entry Form "] 

* Enter Find Mode [] 

* Paste Liter a I [Select, "ExportedToJobTicket 
| Perform Find [] 

| If rstatus(CurrentFoundCount) >0"] 

| Export Records [] 

I Go to Record /Request /Page [First] 

I Paste Literal [Select, "ExportedToJobTicket ff x1 

| Rep lace [" ExportedTo JobT icket " , " Current contents " ] 

1 Else 

i Beep 

I Show Message ["There are no Business Cards to Export!!! "] 

* End If 

* Find All 

* Go to Layout [original layout] 



